home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v10n19.arc
/
CAPSLK.SCR
< prev
next >
Wrap
Text File
|
1991-10-24
|
667b
|
72 lines
NCAPSLOCK.COM
A100
JMP 0147
NOP
NOP
JB 0167
DB 6D
STI
PUSH ES
PUSH DI
PUSH AX
PUSH CX
PUSHF
MOV AX,0000
MOV ES,AX
MOV DI,0417
ES:
MOV AH,[DI]
TEST AH,03
JZ 013D
IN AL,60
CMP AL,10
JS 013D
CMP AL,1A
JS 0137
CMP AL,1E
JS 013D
CMP AL,27
JS 0137
CMP AL,2C
JS 013D
CMP AL,33
JNS 013D
AND AH,BF
ES:
MOV [DI],AH
POPF
POP CX
POP AX
POP DI
POP ES
CS:
JMP FAR [0103]
MOV AX,0000
MOV ES,AX
MOV DI,0024
ES:
MOV AX,[DI]
ES:
MOV BX,[DI+02]
MOV SI,0103
MOV [SI],AX
MOV [SI+02],BX
MOV AX,0000
MOV ES,AX
MOV BX,DS
CLI
MOV DI,0024
MOV AX,0107
ES:
MOV [DI],AX
ES:
MOV [DI+02],BX
STI
MOV DX,0147
INT 27
RCX
79
W
Q